(generic-mode-internal): Use `mapc' rather than `mapcar'.

diff --git a/lisp/emacs-lisp/generic.el b/lisp/emacs-lisp/generic.el
index d57e7ca7657b143b7ddb42ed73111d07725b5043..805507adb49ef1616560668624ff3b263e7d1aa7 100644 (file)
--- a/lisp/emacs-lisp/generic.el
+++ b/lisp/emacs-lisp/generic.el
@@ -205,7 +205,7 @@ See the file generic-x.el for some examples of `define-generic-mode'."
     (setq font-lock-defaults '(generic-font-lock-keywords))
 
     ;; Call a list of functions
-    (mapcar 'funcall function-list)
+    (mapc 'funcall function-list)
 
     (run-mode-hooks mode-hook)))